www.gusucode.com > 茶都拼客网全功能版 8 > 茶都拼客网全功能版 8.8源码程序/teasdxmccom/茶都拼客网V8.8(全功能,无限制,完全开源)/Gu_showtie.asp

    <!--#include file="ku_top.asp"-->
<%
id=request.querystring("guxing")
    If isInt(ID)=False OR Not IsNumeric(ID) Then
    Response.Redirect "Gu_Quan.asp" 
    Response.End()
    End If
    set rs=server.createobject("adodb.recordset")
	sql="update quan_ht set llcs=llcs+1 where ID="&ID&""
	rs.open sql,conn,1,3 

    set rsmsg=server.createobject("adodb.recordset")
    sqlmsg="select * from quan_ht where id="&id&""
    rsmsg.open sqlmsg,conn,1,1
    if rsmsg.bof and rsmsg.eof then
    response.Redirect("Quan.asp")
    end if
    
    class_id=rsmsg("qid")
    mainuser=rsmsg("fbr")
    set rsk=server.createobject("adodb.recordset")
    sqlk="select * from quan where id="&class_id
    rsk.open sqlk,conn,1,1
    
function title()
    ID=Request.QueryString("guxing")     
    set rs=server.createobject("adodb.recordset")
    rs.Open "Select * From quan_ht where id="&id, conn,3,3
    
%>
<%=rs("title")%>
<%end function%>
<div align="center">
<table cellpadding="0" cellspacing="0" width="100">
	<tr>
		<td height="5"></td>
	</tr>
</table>
</div>
<div align="center">
	<table border="0" width="980" height="454" cellpadding="0" cellspacing="0">
		<tr>
			<td height="454" width="740" valign="top">


			<div align="center">


			<table cellpadding="0" cellspacing="0" width="740" height="452">
				<tr>
					<td height="36">
<table border="0" width="740" id="table2" cellpadding="0" cellspacing="0">
							<tr>
<td width="18" height="28" bgcolor="#99ff00"><img border="0" src="pkxx-Img/icon15.gif">
								</td>
								<td width="354" bgcolor="#99ff00" height="28">
<b><font color="#0000FF"> 圈子主题:</font><font color="#ff0000"><%=title%></font></b></td>
								<td width="115" bgcolor="#99ff00" height="28">
<b><a href="Tie_re.asp?qid=<%=rsk("id")%>&tieid=<%=request.querystring("guxing")%>">
<img border="0" src="pkxx-Img/hfht.jpg"></a></b></td>
						<td width="110" bgcolor="#99ff00" height="28"><b><font color="#FF0000">
					<a href="User_put_tie.asp?id=<%=rsk("id")%>">
<img border="0" src="pkxx-Img/fxht.jpg"></a></font></b></td>

							</tr>
						</table></td>
				</tr>
				<tr>
			<td height="396" background="Ku_img/News/news_002.JPG" valign="top">
			

<!---->
<div align="center">
	<table border="0" width="735" height="326" cellpadding="0" cellspacing="0">
		<tr>
			<td height="33" width="735" background="Ku_Img/Art/art_001.jpg">
			<table border="0" width="735" id="table1" cellpadding="0" cellspacing="0">
				<tr>
					<td width="150" height="28" bgcolor="#ddbbaa">
					<p align="left"><b>&nbsp; 【<a href="My_quan.asp?id=<%=rsk("id")%>"><%=rsk("name")%></a>】</b></td>
					<td width="253" bgcolor="#ddbbaa">&gt;&gt; 圈子话题</td>
					<td width="126" bgcolor="#ddbbaa"></td>
					<td width="122" bgcolor="#ddbbaa"></td>
				</tr>
			</table>
			</td>
		</tr>
		<tr>
			<td height="279" width="735" background="Ku_Img/Art/art_002.JPG" valign="top">
			<!--#include file="ku_type/Tie_index.asp"-->
			<!--#include file="ku_type/Tie_re.asp"-->
			</td>
		</tr>

	</table>
</div>
<!---->					
					</td>
				</tr>
			
				<tr>
					<td height="4">
					<img border="0" src="Ku_img/News/news_003.JPG" width="740" height="4"></td>
				</tr>
			</table>


			</div>


			</td>
			<td height="454" width="8"> </td>
			<td height="454" width="232" valign="top">
			<!--#include file="Ku_type/Index_login.asp"-->
			<!--#include file="Ku_type/tie_hot.asp"-->

<img border="0" src="pkxx-img/ad001.JPG" width="232">
<img border="0" src="pkxx-img/ad002.JPG" width="232">
<img border="0" src="pkxx-img/ad003.JPG" width="232">

			</td>
		</tr>
	</table>
</div>
<!--#include file="Ku_foot.asp"-->